home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #2 / Monster Media No. 2 (Monster Media)(1994).ISO / finance / cs4_b.zip / PAYMENT1.STY < prev    next >
Text File  |  1994-05-15  |  2KB  |  76 lines

  1. @UA" Enter Loan Amount "
  2. > @VN01 := {@UA}         ; Principal
  3. @UA" Enter Annual Interest Rate "
  4. > @VN02 := {@UA}         ; Annual Interest rate
  5. @UN" Enter Number of Years"
  6. > @VN10 := {@UN}         ; Number of years
  7. @IF {@VN01} < {1001} THEN
  8. > @VN04 := {50}          ; Jump amount by
  9. @EL @IF {@VN01} < {5001} THEN
  10. > @VN04 := {100}          ; Jump amount by
  11. @EL @IF {@VN01} < {10001} THEN
  12. > @VN04 := {500}          ; Jump amount by
  13. @EL @IF {@VN01} < {100001} THEN
  14. > @VN04 := {1000}          ; Jump amount by
  15. @EL @IF {@VN01} < {200001} THEN
  16. > @VN04 := {2000}          ; Jump amount by
  17. @EL
  18. > @VN04 := {5000}          ; Jump amount by
  19. @EI
  20. @MA5 @MD00
  21. @IF @RD = "SCREEN" THEN
  22. @MK12 @MV12 @MH3
  23. ───────────┬───────────┬───────────┬───────────┬───────────┬───────────┬───────────┬───────────┬───────────┬───────────┬───────────
  24. > @VN07 := {@VN10}
  25. Loan Amount│
  26. @LA9
  27. @VN07  Years│
  28. > @VN07 := {@VN07+1}
  29. @EA
  30. Loan Amount
  31. ───────────┼───────────┼───────────┼───────────┼───────────┼───────────┼───────────┼───────────┼───────────┼───────────┼───────────
  32. @MA11 @MD02
  33. @LA50
  34. @VN01------ │
  35. > @VN07 := {@VN10*12}
  36. @LB9
  37. > @VN03 := [@CM(@VN01,@VN02,@VN07,12)]
  38. @VN03------ │
  39. > @VN07 := {@VN07+12}
  40. @EB
  41. @VN01------
  42. > @VN01 := {@VN01+@VN04}
  43. 
  44. @EA
  45. ───────────┴───────────┴───────────┴───────────┴───────────┴───────────┴───────────┴───────────┴───────────┴───────────┴───────────
  46. @EL
  47. @PA @PD ;
  48. @MI{@RI} ===================================================================================================================================
  49. > @VN07 := {@VN10}
  50. @MI{@RI} Loan Amount ;
  51. @LA9
  52. @VN07  Years ;
  53. > @VN07 := {@VN07+1}
  54. @EA
  55. Loan Amount
  56. @MI{@RI} ===================================================================================================================================
  57. @MA11 @MD02
  58. @LA50
  59. @MI{@RI} @VN01------  ;
  60. > @VN07 := {@VN10*12}
  61. @LB9
  62. > @VN03 := [@CM(@VN01,@VN02,@VN07,12)]
  63. @VN03------  ;
  64. > @VN07 := {@VN07+12}
  65. @EB
  66. @VN01------
  67. > @VN01 := {@VN01+@VN04}
  68. 
  69. @EA
  70. @MI{@RI} ===================================================================================================================================
  71. @EI
  72. @MI{@RI} Report Name: @HN------------------------------------------------------------ 
  73. @MI{@RI} @MA5 Interest rate: @VN02 % 
  74. 
  75. 
  76.